home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ WinNT Network DC Messages.xpl < prev    next >
Text File  |  2003-02-16  |  1KB  |  42 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH 1"="Startup/Shutdown\Startup\Windows NT/2K/XP\35) After Login Window"
  5. "NAME"="Domain Controller (DC) Message"
  6. "VERSION"="2.13"
  7. "OSVERSION"="0101011"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Show message if DC can *NOT* be found"
  10. "DESCRIPTION 1"="By deactivating "Show message if DC can not be found", the user will not see the "A domain controller can not be found" message if the DC of the entered domain couldn't be located." 
  11. "AUTHOR"="Xteq Systems"
  12. "CONTACTURL"="http://www.xteq.com"
  13. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  14. "COMMENT 1"=" "
  15.  
  16.  
  17. 'sV1="HKLM\Network\Logon\DomainLogonMessage"
  18. sV2="HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\ReportDC"
  19.  
  20. Sub Plugin_Initialize 
  21.   i=RegReadValue(sV2)
  22.   if i=0 or IsEmpty(i) then SetUIElement 1,true
  23. End Sub
  24.  
  25. Sub Plugin_CheckData(ElementIndex)
  26. End Sub
  27.  
  28. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  29.     b=GetUIElement(1)
  30.     if b=true then
  31.        Call RegWriteValue(sV2,"0",2)
  32.     else
  33.        Call RegWriteValue(sV2,"1",2)
  34.     end if
  35. End Sub
  36.  
  37. Sub Plugin_Terminate 
  38. End Sub
  39.  
  40.  
  41.  
  42.